home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 May: Tool Chest / Developer CD Series May 1996 (Tool Chest) (Apple Computer) (1996).iso / Sample Code / Snippets / Development Tools & Languages / AEGestalt / ULabelView.cp < prev    next >
Encoding:
Text File  |  1995-02-05  |  2.4 KB  |  91 lines  |  [TEXT/MPS ]
  1. //     ULabelView.cp 
  2. //     Copyright © 1991-92 by Apple Computer, Inc. All rights reserved.
  3. //    Kent Sandvik DTS
  4. //    This file contains all the member functions for TLabelView, i.e.
  5. //    it handles the drawing of the TLabelView view.
  6. //
  7. //    <1>        khs        1.0        First final version
  8.  
  9.  
  10. #ifndef __ULABELVIEW__  
  11. #include "ULabelView.h" 
  12. #endif
  13.  
  14.  
  15. #undef Inherited
  16. #define Inherited TView
  17.  
  18. #pragma segment AInit
  19. DefineClass(TLabelView, TView);
  20.  
  21. TLabelView::TLabelView()
  22. {
  23.  
  24.     //    create all the label strings, yes, this would be far better if we
  25.     //    loaded them in from STR# resources, and maybe we will do this in the
  26.     //    next improved version (and charge $99 for the 1.1 release)
  27.     fLabel1 = "• Machine type:";
  28.     fLabel2 = "• System Version:";
  29.     fLabel3 = "• Processor Type:";
  30.     fLabel4 = "• Has FPU?";
  31.     fLabel5 = "• Has Color Quickdraw?";
  32.     fLabel6 = "• Has 32-bit Quickdraw?";
  33.     fLabel7 = "• Has SCSI?";
  34.     fLabel8 = "• Has Apple Event Mgr?";
  35.     fLabel9 = "• Has EditionMgr?";
  36.     fLabel10 = "• Is A/UX system?";
  37.     fLabel11 = "• Has TrueType?";
  38.     fLabel12 = "• AppleTalk driver no:";
  39. }
  40.  
  41.  
  42. //    Draw the information contained in the drawing object field to screen
  43. #pragma segment ARes
  44. void TLabelView::Draw(const VRect& area)
  45. {
  46.     Inherited::Draw(area);
  47.     // draw the real thing!
  48.     this->DrawLabels();
  49. }
  50.  
  51.  
  52. #pragma segment ARes
  53. void TLabelView::DrawLabels()
  54. {
  55.     // Set font and font size
  56.     PenNormal();
  57.     TextFont(geneva);
  58.     TextSize(9);
  59.  
  60.     // Draw Labels
  61.     MoveTo(kHorizontStart, kVerticalStart);
  62.     DrawString(fLabel1);
  63.     MoveTo(kHorizontStart, kVerticalStart + kVerticalOffset);
  64.     DrawString(fLabel2);
  65.     MoveTo(kHorizontStart, kVerticalStart + 2 * kVerticalOffset);
  66.     DrawString(fLabel3);
  67.     MoveTo(kHorizontStart, kVerticalStart + 3 * kVerticalOffset);
  68.     DrawString(fLabel4);
  69.     MoveTo(kHorizontStart, kVerticalStart + 4 * kVerticalOffset);
  70.     DrawString(fLabel5);
  71.     MoveTo(kHorizontStart, kVerticalStart + 5 * kVerticalOffset);
  72.     DrawString(fLabel6);
  73.     MoveTo(kHorizontStart, kVerticalStart + 6 * kVerticalOffset);
  74.     DrawString(fLabel7);
  75.     MoveTo(kHorizontStart, kVerticalStart + 7 * kVerticalOffset);
  76.     DrawString(fLabel8);
  77.     MoveTo(kHorizontStart, kVerticalStart + 8 * kVerticalOffset);
  78.     DrawString(fLabel9);
  79.     MoveTo(kHorizontStart, kVerticalStart + 9 * kVerticalOffset);
  80.     DrawString(fLabel10);
  81.     MoveTo(kHorizontStart, kVerticalStart + 10 * kVerticalOffset);
  82.     DrawString(fLabel11);
  83.     MoveTo(kHorizontStart, kVerticalStart + 11 * kVerticalOffset);
  84.     DrawString(fLabel12);
  85.  
  86.     // restore pen
  87.     PenNormal();
  88. }
  89.  
  90.  
  91.